home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 February: Tool Chest / Dev.CD Feb 95 / Dev.CD Feb 95.toast / Tool Chest / Interfaces / Universal Interfaces 2.0a3 / Universal AIncludes / Start.a < prev    next >
Encoding:
Text File  |  1994-11-11  |  1.6 KB  |  89 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Start.a
  3. ;
  4. ;    Copyright:    © 1984-1994 by Apple Computer, Inc.
  5. ;                All rights reserved.
  6. ;
  7. ;    Version:    Universal Interfaces 2.0a3  ETO #16, MPW prerelease.  Friday, November 11, 1994. 
  8. ;
  9. ;    Bugs?:        If you find a problem with this file, send the file and version
  10. ;                information (from above) and the problem description to:
  11. ;
  12. ;                    Internet:    apple.bugs@applelink.apple.com
  13. ;                    AppleLink:    APPLE.BUGS
  14. ;
  15. ;
  16.  
  17.     IF &TYPE('__START__') = 'UNDEFINED' THEN
  18. __START__ SET 1
  19.  
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24. ;        include 'ConditionalMacros.a'                                ;
  25. DefStartRec             RECORD    0
  26. VariantLevel0Begin        EQU    *
  27. sdExtDevID                 ds.b    1
  28. sdPartition                 ds.b    1
  29. sdSlotNum                 ds.b    1
  30. sdSRsrcID                 ds.b    1
  31.  
  32.                         ORG        VariantLevel0Begin
  33. sdReserved1                 ds.b    1
  34. sdReserved2                 ds.b    1
  35. sdRefNum                 ds.w    1
  36.  
  37. sizeof                     EQU    4
  38.                         ENDR
  39.  
  40. DefVideoRec             RECORD    0
  41. sdSlot                     ds.b    1
  42. sdsResource                 ds.b    1
  43. sizeof                     EQU    2
  44.                         ENDR
  45.  
  46. DefOSRec                 RECORD    0
  47. sdReserved                 ds.b    1
  48. sdOSType                 ds.b    1
  49. sizeof                     EQU    2
  50.                         ENDR
  51.  
  52.     IF GENERATING68K THEN
  53.         _GetDefaultStartup:    OPWORD    $A07D
  54.     ELSE
  55.         IMPORT    GetDefaultStartup
  56.     ENDIF
  57.  
  58.     IF GENERATING68K THEN
  59.         _SetDefaultStartup:    OPWORD    $A07E
  60.     ELSE
  61.         IMPORT    SetDefaultStartup
  62.     ENDIF
  63.  
  64.     IF GENERATING68K THEN
  65.         _GetVideoDefault:    OPWORD    $A080
  66.     ELSE
  67.         IMPORT    GetVideoDefault
  68.     ENDIF
  69.  
  70.     IF GENERATING68K THEN
  71.         _SetVideoDefault:    OPWORD    $A081
  72.     ELSE
  73.         IMPORT    SetVideoDefault
  74.     ENDIF
  75.  
  76.     IF GENERATING68K THEN
  77.         _GetOSDefault:    OPWORD    $A084
  78.     ELSE
  79.         IMPORT    GetOSDefault
  80.     ENDIF
  81.  
  82.     IF GENERATING68K THEN
  83.         _SetOSDefault:    OPWORD    $A083
  84.     ELSE
  85.         IMPORT    SetOSDefault
  86.     ENDIF
  87.  
  88.     ENDIF ; __START__
  89.